﻿http://forum.wincmd.ru/viewtopic.php?p=112371

Собрано в Lazarus 1.2.6

Version 3.3 beta 3c mod

Убрана задержка, по идее - исправлено поломанное открытие файлов из архива
См. https://github.com/Nik-vr/AmpView/issues/1

Version 3.3 beta 3b mod

Предыдущие версии необходимо полностью удалить!
При ручной установке/обновлении:
- удалить AmpView.wlx и AmpView.wlx64, все dll в папке плагина и Formats, Extensions.lst;
- строку detect в wincmd.ini привести к виду по умолчанию:
_detect="MULTIMEDIA | EXT="MP3" | EXT="WAV" | EXT="WMA" |EXT="OGG" | EXT="CDA" | EXT="MO3" | EXT="IT" |EXT="XM" | EXT="S3M" | EXT="MOD" | EXT="M3U" |EXT="PLS" | EXT="MID"| EXT="MIDI" | EXT="KAR""


Version 3.3 beta 3a mod

Изменения:
  - х64-версия;
  - уменьшена до необходимого задержка при открытии AmpView.exe (большое спасибо SuPriTo и MVV);
  - перед циклом проверки расширений добавлено преобразование в нижний регистр (иначе плагин игнорировал файлы с расширением в верхнем регистре);
  - обновлены библиотеки bass, bassmidi.dll и basswma.dll дополнительно скопированы в Formats (иначе AmpView.exe падал на wma);
  - добавлена поддержка форматов и соответствующие dll в папку Formats
      bass_aac.dll:  aac m4a m4b mp4
      bass_ac3.dll:  ac3
      bass_adx.dll:  adx
      bass_aix.dll:  aix
      bass_alac.dll: m4a
      bass_ape.dll:  ape mac
      bass_flac.dll: flac fla oga
      bass_mpc.dll:  mpc mp+ mpp
      bass_ofr.dll:  ofr ofs
      bass_opus.dll: opus
      bass_spx.dll:  spx
      bass_tak.dll:  tak
      bass_tta.dll:  tta
      bass_wv.dll:   wv
      включая OptimFROG.dll и tak_deco_lib.dll рядом с AmpView.exe
    + добавлены расширения mpa, aiff, aif, aifc
  (в detect-строку ничего дописывать не надо (по умолчанию добавляется MULTIMEDIA, этого достаточно), в Extensions.lst тоже).


Патч AmpView.lpr:
========================================================================
--- wlx/AmpView.lpr
--- wlx/AmpView.lpr
@@ -10,10 +10,13 @@
                    'EXT="XM" | EXT="S3M" | EXT="MOD" | EXT="M3U" |'+
                    'EXT="PLS" | EXT="MID"| EXT="MIDI" | EXT="KAR"';
 
- NumOfBaseExt=19;
+ NumOfBaseExt=45;
  BaseExt: array [0..NumOfBaseExt] of string = ('m3u', 'pls', 'mp3',
   'wav', 'wma', 'mp2', 'mp1', 'ogg', 'cda', 'mo3', 'it', 'xm', 's3m',
-  'mtm', 'mod', 'umx', 'mid', 'midi', 'kar', 'rmi');
+  'mtm', 'mod', 'umx', 'mid', 'midi', 'kar', 'rmi', 'aac', 'ac3', 'adx',
+  'aif', 'aifc', 'aiff', 'aix', 'ape', 'fla', 'flac', 'm4a', 'm4b',
+  'mac', 'mp+', 'mp4', 'mpa', 'mpc', 'mpp', 'ofr', 'ofs', 'oga', 'opus',
+  'spx', 'tak', 'tta', 'wv');
 
 var
   wc: TWndClass;
@@ -65,6 +68,7 @@
  if FileExt='' then exit; // если расширение не получено - сразу выходим
 
  // Проверка базовых расширений
+ FileExt:=LowerCase(FileExt);
  for i:=0 to NumOfBaseExt do
   if (FileExt = BaseExt[i]) then
    begin
========================================================================
